* lisp/eshell/em-prompt.el (eshell-emit-prompt): Make sure we can't insert

into the prompt either.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7bea340ee813f87243c77824ef53645153f4ed20..2a2d1203160a322d5b0a4309943283cfe1f587de 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-03-26  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * eshell/em-prompt.el (eshell-emit-prompt): Make sure we can't insert
+       into the prompt either (bug#13963).
+
 2013-03-25  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * font-lock.el (lisp-font-lock-keywords-2): Don't highlight the "error"

diff --git a/lisp/eshell/em-prompt.el b/lisp/eshell/em-prompt.el
index c1c4d4730f9146d41c627698e07a0071187846d1..c5429c59bd66d57842918ed68f282546bbaa4902 100644 (file)
--- a/lisp/eshell/em-prompt.el
+++ b/lisp/eshell/em-prompt.el
@@ -122,6 +122,7 @@ arriving, or after."
           (add-text-properties 0 (length prompt)
                                '(read-only t
                                  face eshell-prompt
+                                 front-sticky (face read-only)
                                  rear-nonsticky (face read-only))
                                prompt))
       (eshell-interactive-print prompt)))